#include <iostream>
#include <string>
#include <cstring>
#include <functional>
#include <sys/socket.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <unistd.h>
#include <pthread.h>

#include "Log.hpp"
#include "LockGuard.hpp"
#include "InetAddr.hpp"
#include "ThreadPool.hpp"

const static int defaultsockfd = -1;
const static int gbacklog = 16;

using task_t = std::function<void()>;

enum
{
    SOCKET_ERROR = 0,
    BIND_ERROR,
    USAGE_ERROR
};

class TcpServer;

class ThreadData
{
public:
    ThreadData(int fd, InetAddr addr, TcpServer *s) : sockfd(fd), clientaddr(addr), self(s)
    {
    }

public:
    int sockfd;
    InetAddr clientaddr;
    TcpServer *self;
};

class TcpServer
{

public:
    TcpServer(int port) : _port(port), _listensock(defaultsockfd) {}
    void InitServer()
    {
        // 1、创建流式套接字
        _listensock = ::socket(AF_INET, SOCK_STREAM, 0);
        if (_listensock < 0)
        {
            LOG(FATAL, "socket create error\n");
            exit(SOCKET_ERROR);
        }
        LOG(DEBUG, "socket create success, sockfd is : %d\n", _listensock);

        // 2、bind
        struct sockaddr_in local;
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = INADDR_ANY;

        int n = bind(_listensock, (struct sockaddr *)&local, sizeof(local));
        if (n < 0)
        {
            // 输出具体的错误信息
            LOG(FATAL, "bind error: %s\n", strerror(errno));
            exit(BIND_ERROR);
        }
        LOG(DEBUG, "bind success, sockfd is : %d\n", _listensock);

        // 3、tcp是面向连接的，所以通信之前,必须先建立连接，服务器是被连接的，
        //    tcpserver 启动，未来首先要一直等待客户的连接到来
        n = listen(_listensock, gbacklog);
        if (n < 0)
        {
            LOG(FATAL, "listen error\n");
            exit(BIND_ERROR);
        }
        LOG(DEBUG, "listen success, sockfd is : %d\n", _listensock);
    }

    void Service(int sockfd, InetAddr client)
    {
        LOG(DEBUG, "get a new link, info %s:%d\n", client.Ip(), client.Port());

        std::string clientadddr = "[" + client.Ip() + ":" + std::to_string(client.Port()) + "]#";

        while (true)
        {
            // 直接使用文件的读写接口来和客户端通信
            char inbuffer[1024];
            ssize_t n = read(sockfd, inbuffer, sizeof(inbuffer) - 1);
            if (n > 0)
            {
                inbuffer[n] = 0;
                std::cout << clientadddr << inbuffer << std::endl;

                std::string echo_string = "[server echo]# ";
                echo_string += inbuffer;

                write(sockfd, echo_string.c_str(), echo_string.size()); // 把读到的消息发回去
            }
            else if (n == 0) // 读到0说明读到文件结尾
            {
                // client 退出&&关键字
                LOG(INFO, "%s quit\n", clientadddr.c_str());
                break;
            }
            else
            {
                LOG(ERROR, "%read error\n");
                break;
            }
        }
        // 这个套接字，用完就必须关掉，因为这样才好给下一个申请连接用 不然可能导致->文件描述符泄露
        ::close(sockfd);
    }

    static void *HanderSock(void *args)
    {
        ThreadData *td = static_cast<ThreadData *>(args);
        td->self->Service(td->sockfd, td->clientaddr);
        delete td;
        return nullptr;
    }

    void Loop() // 启动 和udp里面的start是一样的
    {
        _isrunning = true;
        // 4、不能直接接受数据，先获取连接
        while (_isrunning)
        {
            // 先接收客户端的连接申请
            struct sockaddr_in peer;
            socklen_t len = sizeof(peer);
            int sockfd = ::accept(_listensock, (struct sockaddr *)&peer, &len);
            if (sockfd < 0)
            {
                LOG(WARNING, "accept error\n");
                continue;
            }

            // version 0 : 一次只能处理一个请求 --- 不可能
            // Service(sockfd, InetAddr(peer));// InetAddr addr(peer)->ip地址的转化

            // version 1 : 采用多进程
            // pid_t id = fork();
            // if (id == 0)
            // {
            //     // child : 关心sockfd, 不关心listensock
            //     ::close(_listensock); // 建议 因为继承了父进程的文件描述符表，但是子进程不关心父进程的linten套接字（实际上就是一个文件描述符表的下标）
            //     if (fork() > 0)
            //         exit(0);                     // 这里又fork了一下，创建了孙子进程，创建好了后，子进程的fork返回的值才是>0的，所以就把子进程关了，孙子进程变成孤儿进程，就不需要父进程来等待了，因为孤儿进程会被系统领养
            //     Service(sockfd, InetAddr(peer)); // 走到这里的一定是 孙子进程（孤儿进程），用孙子进程来执行任务
            // }
            // // father 只关心listensock 不关心sockfd
            // ::close(sockfd);
            // waitpid(id, nullptr, 0);

            // version 2 : 采用多线程
            // pthread_t t;
            // ThreadData *td = new ThreadData(sockfd, InetAddr(peer), this);
            // pthread_create(&t, nullptr, HanderSock, td);

            // version 3 : 采用线程池
            task_t t = std::bind(&TcpServer::Service, this, sockfd, InetAddr(peer));
            ThreadPool<task_t>::GetInstance()->Enqueue(t);
        }

        _isrunning = false;
    }

    ~TcpServer()
    {
        // 正常情况下，listen套接字是不能被关闭的，除非服务器要停止了  而另一个套接字，用完就必须关掉，因为这样才好给下一个申请连接用
        if (_listensock > defaultsockfd)
            ::close(_listensock);
    }

private:
    uint16_t _port;
    int _listensock;
    bool _isrunning;
};